(cons_to_long, long_to_cons): No longer static.

diff --git a/src/xselect.c b/src/xselect.c
index 20aa5a9ba0e3161e797ad48cbe763edf8f19ca18..c57f51604b331f11622a483878dae94f1d53f8bb 100644 (file)
--- a/src/xselect.c
+++ b/src/xselect.c
@@ -229,32 +229,36 @@ x_atom_to_symbol (display, atom)
   UNBLOCK_INPUT;
   return val;
 }
+\f
+/* Convert between full word time values (last modification times, etc)
+   and their Lisp representation as a cons cell (HIGH . LOW).  */
 
-
-static Lisp_Object
+Lisp_Object
 long_to_cons (i)
      unsigned long i;
 {
   unsigned int top = i >> 16;
   unsigned int bot = i & 0xFFFF;
-  if (top == 0) return make_number (bot);
-  if (top == 0xFFFF) return Fcons (make_number (-1), make_number (bot));
+  if (top == 0)
+    return make_number (bot);
+  if (top == 0xFFFF)
+    return Fcons (make_number (-1), make_number (bot));
   return Fcons (make_number (top), make_number (bot));
 }
 
-static unsigned long
+unsigned long
 cons_to_long (c)
      Lisp_Object c;
 {
   int top, bot;
-  if (INTEGERP (c)) return XINT (c);
+  if (INTEGERP (c))
+    return XINT (c);
   top = XCONS (c)->car;
   bot = XCONS (c)->cdr;
-  if (CONSP (bot)) bot = XCONS (bot)->car;
+  if (CONSP (bot))
+    bot = XCONS (bot)->car;
   return ((XINT (top) << 16) | XINT (bot));
 }
-
-
 \f
 /* Do protocol to assert ourself as a selection owner.
    Update the Vselection_alist so that we can reply to later requests for